home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / SourceCode / Palettes / TTools / TToolsPalette / TToolsPalette.m < prev   
Text File  |  1995-06-12  |  997b  |  37 lines
  1. /* TToolsPalette.m
  2.  * Written By:  Thomas Burkholder
  3.  *
  4.  * You may freely copy, distribute, and reuse the code in this example.
  5.  * NeXT disclaims any warranty of any kind, expressed or  implied, as to its
  6.  * fitness for any particular use.
  7.  */
  8.  
  9. #import "TToolsPalette.h"
  10.  
  11. @implementation TToolsPalette
  12.  
  13. - finishInstantiate 
  14. {
  15.     [self associateObject:switchView
  16.         type:IBViewPboardType with:switchViewCover];
  17.     [self associateObject:timerObject
  18.         type:IBObjectPboardType with:timerView];
  19.     [self associateObject:rankerView
  20.         type:IBViewPboardType with:rankerCover];
  21.     [self associateObject:listObject
  22.         type:IBObjectPboardType with:listCover];
  23.     [self associateObject:tBinderObject
  24.         type:IBObjectPboardType with:tBinderCover];
  25.     [self associateObject:sortedList
  26.         type:IBObjectPboardType with:sortedListCover];
  27.     [self associateObject:classAgent
  28.         type:IBObjectPboardType with:classAgentCover];
  29.     [self associateObject:stringAgent
  30.         type:IBObjectPboardType with:stringAgentCover];
  31.  
  32.     return self;
  33. }
  34.  
  35.  
  36. @end
  37.